home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
HPAVC
/
HPAVC CD-ROM.iso
/
ABUSESRC.ZIP
/
AbuseSrc
/
imlib
/
texture.c
< prev
next >
Wrap
C/C++ Source or Header
|
1996-04-11
|
10KB
|
287 lines
#include "image.hpp"
#include "video.hpp"
#include "macs.hpp"
#include "event.hpp"
#include <math.h>
#define SHB 7
class vect
{
public :
long screenx, screeny, screendx, screendy,
imagex, imagey, imagedx, imagedy;
short steps;
void init(short imagex1, short imagey1, short imagex2, short imagey2,
short screenx1, short screeny1, short screenx2, short screeny2);
short step();
} ;
inline short vect::step()
{
long oy;
do
{
oy=screeny>>SHB;
screenx+=screendx;
screeny+=screendy;
imagex+=imagedx;
imagey+=imagedy;
steps--;
} while (steps && (screeny>>SHB)==oy);
return steps>=0;
}
void vect::init(short imagex1, short imagey1, short imagex2, short imagey2,
short screenx1, short screeny1, short screenx2, short screeny2)
{
steps=abs(screeny1-screeny2)+1;
screenx=(long)screenx1<<SHB;
screeny=(long)screeny1<<SHB;
if (screenx2>=screenx1)
screendx=((long)(screenx2-screenx1+1)<<(SHB*2))/((long)(steps<<SHB));
else screendx=((long)(screenx2-screenx1-1)<<(SHB*2))/((long)(steps<<SHB));
if (screeny2>=screeny1)
screendy=((long)(screeny2-screeny1+1)<<(SHB*2))/((long)(steps<<SHB));
else
screendy=((long)(screeny2-screeny1-1)<<(SHB*2))/((long)(steps<<SHB));
imagex =(long)imagex1<<SHB;
imagey =(long)imagey1<<SHB;
if (imagex2>=imagex1)
imagedx=((long)(imagex2-imagex1)<<(SHB*2))/((long)(steps<<SHB));
else
imagedx=((long)(imagex2-imagex1)<<(SHB*2))/((long)(steps<<SHB));
if (imagey2>=imagey1)
imagedy=((long)(imagey2-imagey1)<<(SHB*2))/((long)(steps<<SHB));
else
imagedy=((long)(imagey2-imagey1)<<(SHB*2))/((long)(steps<<SHB));
}
void texture_map(image *screen, image *tx, short *points)
{
vect right[2],left[2];
unsigned char *sl;
short l=0,r=0,y,sa,min,max,i,x1,x2,screeny;
short cx1,cy1,cx2,cy2;
long ix,iy,idx,idy,steps,scx;
screen->get_clip(cx1,cy1,cx2,cy2);
x1=0;
x2=0;
for (i=1;i<4;i++)
if (points[i*2]<points[x1*2])
x1=i;
else if (points[i*2]>points[x2*2])
x2=i;
min=0;
max=0;
for (i=1;i<4;i++)
if (points[i*2+1]<points[min*2+1])
min=i;
else if (points[i*2+1]>points[max*2+1])
max=i;
if (min==0)
{
right[0].init(0,0,tx->width()-1,0, points[0],points[1],points[2],points[3]);
right[1].init(tx->width()-1,0,tx->width()-1,tx->height()-1,points[2],points[3],points[4],points[5]);
left[0].init(0,0,0,tx->height()-1, points[0],points[1],points[6],points[7]);
left[1].init(0,tx->height()-1,tx->width()-1,tx->height()-1,points[6],points[7],points[4],points[5]);
}
else if (min==1)
{
right[0].init(tx->width()-1,0,tx->width()-1,tx->height()-1, points[2],points[3],points[4],points[5]);
right[1].init(tx->width()-1,tx->height()-1,0,tx->height()-1,points[4],points[5],points[6],points[7]);
left[0].init(tx->width()-1,0,0,0, points[2],points[3],points[0],points[1]);
left[1].init(0,0,0,tx->height()-1, points[0],points[1],points[6],points[7]);
} else if (min==2)
{
right[0].init(tx->width()-1,tx->height()-1,0,tx->height()-1,points[4],points[5],points[6],points[7]);
right[1].init(0,tx->height()-1,0,0, points[6],points[7],points[0],points[1]);
left[0].init(tx->width()-1,tx->height()-1, tx->width()-1,0, points[4],points[5],points[2],points[3]);
left[1].init(tx->width()-1,0,0,0, points[2],points[3],points[0],points[1]);
} else
{
right[0].init(0,tx->height()-1,0,0, points[6],points[7],points[0],points[1]);
right[1].init(0,0,tx->width()-1,0, points[0],points[1],points[2],points[3]);
left[0].init(0,tx->height()-1,tx->width()-1,tx->height()-1, points[6],points[7],points[4],points[5]);
left[1].init(tx->width()-1,tx->height()-1, tx->width()-1,0, points[4],points[5],points[2],points[3]);
}
do
{
screeny=right[r].screeny>>SHB;
if (screeny>=cy1 && screeny<=cy2)
{
sl=screen->scan_line(screeny);
ix=left[l].imagex;
iy=left[l].imagey;
if (left[l].screenx<right[r].screenx)
{ sa=1; steps=right[r].screenx-left[l].screenx; }
else { sa=-1; steps=left[l].screenx-right[r].screenx; }
steps+=1<<SHB;
if (right[r].imagex>ix)
idx=((right[r].imagex-ix)<<SHB)/steps;
else idx=((right[r].imagex-ix)<<SHB)/steps;
if (right[r].imagey>iy)
idy=((right[r].imagey-iy)<<SHB)/steps;
else idy=((right[r].imagey-iy)<<SHB)/steps;
scx=left[l].screenx>>SHB;
steps=steps>>SHB;
if (left[l].screenx<right[r].screenx)
sa=1; else sa=-1;
while (steps--)
{
if (scx>=cx1 && scx<=cx2)
sl[scx]=tx->scan_line(iy>>SHB)[ix>>SHB];
ix+=idx; iy+=idy;
scx+=sa;
}
}
do
{ y=right[r].screeny>>SHB;
if (!right[r].step())
r++;
} while (r!=2 && y==right[r].screeny>>SHB);
do
{ y=left[l].screeny>>SHB;
if (!left[l].step())
l++;
} while (l!=2 && y==left[l].screeny>>SHB);
} while (r!=2 && l!=2);
}
// slower, but allows transparency textures
void clear_texture_map(image *screen, image *tx, short *points)
{
vect right[3],left[3];
unsigned char *sl;
short l=0,r=0,y,sa,min,max,i,x1,x2,screeny;
short cx1,cy1,cx2,cy2;
long ix,iy,idx,idy,steps,scx;
screen->get_clip(cx1,cy1,cx2,cy2);
x1=0;
x2=0;
for (i=1;i<4;i++)
if (points[i*2]<points[x1*2])
x1=i;
else if (points[i*2]>points[x2*2])
x2=i;
min=0;
max=0;
for (i=1;i<4;i++)
if (points[i*2+1]<points[min*2+1])
min=i;
else if (points[i*2+1]>points[max*2+1])
max=i;
if (min==0)
{
right[0].init(0,0,tx->width()-1,0, points[0],points[1],points[2],points[3]);
right[1].init(tx->width()-1,0,tx->width()-1,tx->height()-1,points[2],points[3],points[4],points[5]);
right[2].init(tx->width()-1,tx->height()-1,0,tx->height()-1,points[4],points[5],points[6],points[7]);
left[0].init(0,0,0,tx->height()-1, points[0],points[1],points[6],points[7]);
left[1].init(0,tx->height()-1,tx->width()-1,tx->height()-1,points[6],points[7],points[4],points[5]);
left[2].init(tx->width()-1,tx->height()-1,tx->width()-1,0, points[4],points[5],points[2],points[3]);
}
else if (min==1)
{
right[0].init(tx->width()-1,0,tx->width()-1,tx->height()-1, points[2],points[3],points[4],points[5]);
right[1].init(tx->width()-1,tx->height()-1,0,tx->height()-1,points[4],points[5],points[6],points[7]);
right[2].init(0,tx->height()-1,0,0, points[6],points[7],points[0],points[1]);
left[0].init(tx->width()-1,0,0,0, points[2],points[3],points[0],points[1]);
left[1].init(0,0,0,tx->height()-1, points[0],points[1],points[6],points[7]);
left[2].init(0,tx->height()-1,tx->width()-1,tx->height()-1, points[6],points[7],points[4],points[5]);
} else if (min==2)
{
right[0].init(tx->width()-1,tx->height()-1,0,tx->height()-1,points[4],points[5],points[6],points[7]);
right[1].init(0,tx->height()-1,0,0, points[6],points[7],points[0],points[1]);
right[2].init(0,0,tx->width()-1,0, points[0],points[1],points[2],points[3]);
left[0].init(tx->width()-1,tx->height()-1, tx->width()-1,0, points[4],points[5],points[2],points[3]);
left[1].init(tx->width()-1,0,0,0, points[2],points[3],points[0],points[1]);
left[2].init(0,0,0,tx->height()-1, points[0],points[1],points[6],points[7]);
} else
{
right[0].init(0,tx->height()-1,0,0, points[6],points[7],points[0],points[1]);
right[1].init(0,0,tx->width()-1,0, points[0],points[1],points[2],points[3]);
right[2].init(tx->width()-1,0,tx->width()-1,tx->height(), points[2],points[3],points[4],points[5]);
left[0].init(0,tx->height()-1,tx->width()-1,tx->height()-1, points[6],points[7],points[4],points[5]);
left[1].init(tx->width()-1,tx->height()-1, tx->width()-1,0, points[4],points[5],points[2],points[3]);
left[2].init(tx->width()-1,0,0,0, points[2],points[3],points[0],points[1]);
}
do
{
screeny=right[r].screeny>>SHB;
if (screeny>=cy1 && screeny<=cy2)
{
sl=screen->scan_line(screeny);
ix=left[l].imagex;
iy=left[l].imagey;
if (left[l].screenx<right[r].screenx)
{ sa=1; steps=right[r].screenx-left[l].screenx; }
else { sa=-1; steps=left[l].screenx-right[r].screenx; }
steps+=1<<SHB;
if (right[r].imagex>ix)
idx=((right[r].imagex-ix)<<SHB)/steps;
else idx=((right[r].imagex-ix)<<SHB)/steps;
if (right[r].imagey>iy)
idy=((right[r].imagey-iy)<<SHB)/steps;
else idy=((right[r].imagey-iy)<<SHB)/steps;
scx=left[l].screenx>>SHB;
steps=steps>>SHB;
if (left[l].screenx<right[r].screenx)
sa=1; else sa=-1;
while (steps--)
{
if (scx>=cx1 && scx<=cx2)
{
unsigned char c=tx->scan_line(iy>>SHB)[ix>>SHB];
if (c!=current_background)
sl[scx]=c;
}
ix+=idx; iy+=idy;
scx+=sa;
}
}
do
{ y=right[r].screeny>>SHB;
if (!right[r].step())
r++;
} while (r!=2 && y==(right[r].screeny>>SHB));
do
{ y=left[l].screeny>>SHB;
if (!left[l].step())
l++;
} while (l!=2 && y==(left[l].screeny>>SHB));
} while ((r!=2 || l==0) && (l!=2 || r==0));
}